inherited frmProviderEdit: TfrmProviderEdit
  Left = 306
  Top = 319
  Width = 777
  Height = 324
  Caption = #23458#25143#26723#26696#32534#36753
  PixelsPerInch = 96
  TextHeight = 12
  object lbl1: TLabel [0]
    Left = 16
    Top = 16
    Width = 48
    Height = 12
    Caption = #23458#25143#32534#30721
  end
  object lbl2: TLabel [1]
    Left = 213
    Top = 16
    Width = 48
    Height = 12
    Caption = #23458#25143#21517#31216
  end
  object lbl3: TLabel [2]
    Left = 411
    Top = 16
    Width = 24
    Height = 12
    Caption = #30005#35805
  end
  object lbl4: TLabel [3]
    Left = 584
    Top = 16
    Width = 24
    Height = 12
    Caption = #25163#26426
  end
  object lbl5: TLabel [4]
    Left = 16
    Top = 80
    Width = 48
    Height = 12
    Caption = #24320#31080#21517#31216
  end
  object lbl6: TLabel [5]
    Left = 16
    Top = 104
    Width = 48
    Height = 12
    Caption = #24320#31080#22320#22336
  end
  object lbl7: TLabel [6]
    Left = 224
    Top = 44
    Width = 24
    Height = 12
    Caption = #36134#25143
    FocusControl = dbedtACCOUNTNUMBER
  end
  object lbl8: TLabel [7]
    Left = 456
    Top = 43
    Width = 24
    Height = 12
    Caption = #31246#21495
    FocusControl = dbedtTAXNUMBER
  end
  object lbl9: TLabel [8]
    Left = 16
    Top = 43
    Width = 48
    Height = 12
    Caption = #24320#25143#38134#34892
    FocusControl = dbedtBANK
  end
  object lbl10: TLabel [9]
    Left = 392
    Top = 75
    Width = 48
    Height = 12
    Caption = #23458#25143#31867#22411
    FocusControl = dbedtTAXNUMBER
  end
  inherited CancelButton: TButton
    Left = 687
    Top = 256
  end
  inherited OKButton: TButton
    Left = 607
    Top = 256
    ModalResult = 0
    OnClick = OKButtonClick
  end
  object dbedtCLIENTNUMBER: TDBEdit [12]
    Left = 80
    Top = 16
    Width = 121
    Height = 20
    DataField = 'CLIENTNUMBER'
    DataSource = ds1
    TabOrder = 2
  end
  object dbedtCLIENTNAME: TDBEdit [13]
    Left = 277
    Top = 16
    Width = 121
    Height = 20
    DataField = 'CLIENTNAME'
    DataSource = ds1
    TabOrder = 3
  end
  object dbedtTELEPHONE: TDBEdit [14]
    Left = 451
    Top = 16
    Width = 121
    Height = 20
    DataField = 'TELEPHONE'
    DataSource = ds1
    TabOrder = 4
  end
  object dbedtMOBILEPHONE: TDBEdit [15]
    Left = 616
    Top = 16
    Width = 121
    Height = 20
    DataField = 'MOBILEPHONE'
    DataSource = ds1
    TabOrder = 5
  end
  object dbedtINVOICENAME: TDBEdit [16]
    Left = 80
    Top = 72
    Width = 281
    Height = 20
    DataField = 'INVOICENAME'
    DataSource = ds1
    TabOrder = 6
  end
  object dbedtINVOICEADDRESS: TDBEdit [17]
    Left = 80
    Top = 104
    Width = 281
    Height = 20
    DataField = 'INVOICEADDRESS'
    DataSource = ds1
    TabOrder = 7
  end
  object dbedtACCOUNTNUMBER: TDBEdit [18]
    Left = 256
    Top = 40
    Width = 185
    Height = 20
    DataField = 'ACCOUNTNUMBER'
    DataSource = ds1
    TabOrder = 8
  end
  object dbedtTAXNUMBER: TDBEdit [19]
    Left = 488
    Top = 41
    Width = 209
    Height = 20
    DataField = 'TAXNUMBER'
    DataSource = ds1
    TabOrder = 9
  end
  object dbedtBANK: TDBEdit [20]
    Left = 80
    Top = 43
    Width = 121
    Height = 20
    DataField = 'BANK'
    DataSource = ds1
    TabOrder = 10
  end
  object DBComboBoxEh1: TDBComboBoxEh [21]
    Left = 448
    Top = 72
    Width = 169
    Height = 20
    DataField = 'CLIENTTYPE'
    DataSource = ds1
    EditButtons = <>
    Items.Strings = (
      #20379#26041
      #38656#26041
      #20010#20154)
    TabOrder = 11
    Visible = True
  end
  object qry1: TADOQuery
    Connection = CommonData.conn
    CursorType = ctStatic
    Parameters = <
      item
        Name = 'clientid'
        Attributes = [paSigned]
        DataType = ftInteger
        Precision = 10
        Size = 4
        Value = Null
      end>
    SQL.Strings = (
      'select * from tb_client where clientid=:clientid')
    Left = 128
    Top = 216
    object qry1CLIENTID: TAutoIncField
      FieldName = 'CLIENTID'
      ReadOnly = True
    end
    object qry1CLIENTNUMBER: TStringField
      FieldName = 'CLIENTNUMBER'
      Size = 10
    end
    object qry1CLIENTNAME: TStringField
      FieldName = 'CLIENTNAME'
      Size = 40
    end
    object qry1CLIENTTYPE: TStringField
      FieldName = 'CLIENTTYPE'
      Size = 10
    end
    object qry1MEMBERSIGN: TStringField
      FieldName = 'MEMBERSIGN'
      FixedChar = True
      Size = 2
    end
    object qry1CLIENTSORT: TStringField
      FieldName = 'CLIENTSORT'
      Size = 30
    end
    object qry1CLIENTSTYLE: TStringField
      FieldName = 'CLIENTSTYLE'
      Size = 30
    end
    object qry1TELEPHONE: TStringField
      FieldName = 'TELEPHONE'
      Size = 60
    end
    object qry1MOBILEPHONE: TStringField
      FieldName = 'MOBILEPHONE'
      Size = 60
    end
    object qry1EMAIL: TStringField
      FieldName = 'EMAIL'
    end
    object qry1ZIPCODE: TStringField
      FieldName = 'ZIPCODE'
      Size = 10
    end
    object qry1OTHERCONTACT: TStringField
      FieldName = 'OTHERCONTACT'
      Size = 30
    end
    object qry1ADDRESS: TStringField
      FieldName = 'ADDRESS'
      Size = 60
    end
    object qry1COMPANY: TStringField
      FieldName = 'COMPANY'
      Size = 40
    end
    object qry1OCCUPATION: TStringField
      FieldName = 'OCCUPATION'
      Size = 30
    end
    object qry1BUSINESS: TStringField
      FieldName = 'BUSINESS'
      Size = 30
    end
    object qry1DRIVECARD: TStringField
      FieldName = 'DRIVECARD'
      Size = 30
    end
    object qry1DIRVECARDCHECK: TDateTimeField
      FieldName = 'DIRVECARDCHECK'
    end
    object qry1BIRTHDAY: TDateTimeField
      FieldName = 'BIRTHDAY'
    end
    object qry1INTEREST: TBlobField
      FieldName = 'INTEREST'
    end
    object qry1MEMBERGRADE: TStringField
      FieldName = 'MEMBERGRADE'
      Size = 30
    end
    object qry1TREATYINDATE: TDateTimeField
      FieldName = 'TREATYINDATE'
    end
    object qry1TREATYOUTDATE: TDateTimeField
      FieldName = 'TREATYOUTDATE'
    end
    object qry1SMSGROUP: TStringField
      FieldName = 'SMSGROUP'
      Size = 30
    end
    object qry1CLIENTNOTE: TBytesField
      FieldName = 'CLIENTNOTE'
      Size = 1
    end
    object qry1SPELL: TStringField
      FieldName = 'SPELL'
      Size = 40
    end
    object qry1INVOICENAME: TStringField
      FieldName = 'INVOICENAME'
      Size = 40
    end
    object qry1INVOICEADDRESS: TStringField
      FieldName = 'INVOICEADDRESS'
      Size = 40
    end
    object qry1ACCOUNTNUMBER: TStringField
      FieldName = 'ACCOUNTNUMBER'
      Size = 30
    end
    object qry1TAXNUMBER: TStringField
      FieldName = 'TAXNUMBER'
      Size = 30
    end
    object qry1BANK: TStringField
      FieldName = 'BANK'
      Size = 40
    end
    object qry1CREDITSIGN: TStringField
      FieldName = 'CREDITSIGN'
      FixedChar = True
      Size = 2
    end
    object qry1MAXCREADIT: TBCDField
      FieldName = 'MAXCREADIT'
      Precision = 15
      Size = 2
    end
    object qry1ERASESIGN: TStringField
      FieldName = 'ERASESIGN'
      FixedChar = True
      Size = 2
    end
    object qry1AREA: TStringField
      FieldName = 'AREA'
      Size = 30
    end
    object qry1SEX: TStringField
      FieldName = 'SEX'
      Size = 10
    end
    object qry1CLIENTLINKER: TStringField
      FieldName = 'CLIENTLINKER'
      Size = 10
    end
    object qry1LINKER: TStringField
      FieldName = 'LINKER'
      Size = 10
    end
    object qry1IDCARDNUMBER: TStringField
      FieldName = 'IDCARDNUMBER'
    end
    object qry1INITINTEGRAL: TBCDField
      FieldName = 'INITINTEGRAL'
      Precision = 15
      Size = 2
    end
    object qry1SERVICEINTEGRAL: TBCDField
      FieldName = 'SERVICEINTEGRAL'
      Precision = 15
      Size = 2
    end
    object qry1OTHERINTEGRAL: TBCDField
      FieldName = 'OTHERINTEGRAL'
      Precision = 15
      Size = 2
    end
    object qry1CONSUMEINTEGRAL: TBCDField
      FieldName = 'CONSUMEINTEGRAL'
      Precision = 15
      Size = 2
    end
    object qry1TOTALINTEGRAL: TBCDField
      FieldName = 'TOTALINTEGRAL'
      ReadOnly = True
      Precision = 17
      Size = 2
    end
    object qry1REMAININTEGRAL: TBCDField
      FieldName = 'REMAININTEGRAL'
      ReadOnly = True
      Precision = 18
      Size = 2
    end
    object qry1INTSUM: TBCDField
      FieldName = 'INTSUM'
      Precision = 15
      Size = 2
    end
    object qry1BEFORESUM: TBCDField
      FieldName = 'BEFORESUM'
      Precision = 15
      Size = 2
    end
    object qry1TOTALSUM: TBCDField
      FieldName = 'TOTALSUM'
      Precision = 15
      Size = 2
    end
    object qry1REMAINSUM: TBCDField
      FieldName = 'REMAINSUM'
      ReadOnly = True
      Precision = 16
      Size = 2
    end
    object qry1SELLPRICETYPE: TStringField
      FieldName = 'SELLPRICETYPE'
    end
    object qry1STANDPRICETYPE: TStringField
      FieldName = 'STANDPRICETYPE'
    end
    object qry1INITCONSUMESUM: TBCDField
      FieldName = 'INITCONSUMESUM'
      Precision = 15
      Size = 2
    end
    object qry1CONSUMESUM: TBCDField
      FieldName = 'CONSUMESUM'
      Precision = 15
      Size = 2
    end
    object qry1UDF1: TStringField
      FieldName = 'UDF1'
      Size = 40
    end
    object qry1UDF2: TStringField
      FieldName = 'UDF2'
      Size = 40
    end
    object qry1UDF3: TStringField
      FieldName = 'UDF3'
      Size = 40
    end
    object qry1PICTURE: TBlobField
      FieldName = 'PICTURE'
    end
    object qry1CREATEDATE: TDateTimeField
      FieldName = 'CREATEDATE'
    end
    object qry1CREATED: TBytesField
      FieldName = 'CREATED'
      ReadOnly = True
      Size = 8
    end
    object qry1UPDATED: TDateTimeField
      FieldName = 'UPDATED'
    end
    object qry1ISSHARED: TStringField
      FieldName = 'ISSHARED'
      FixedChar = True
      Size = 2
    end
  end
  object ds1: TDataSource
    DataSet = qry1
    Left = 192
    Top = 208
  end
end
